home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Tools 5
/
Amiga Tools 5.iso
/
tools
/
dfÜ
/
bbs
/
microbbs1.1
/
commands
/
addlastuser
next >
Wrap
AmigaDOS Script File
|
1996-01-23
|
2KB
|
44 lines
.key NAME,LINE,CONNECT
.bra {
.ket }
C:FailAt 21
C:Move BBS:T/LastUser.14 TO BBS:T/LastUser.15
C:Rename BBS:T/LastUser.13 TO BBS:T/LastUser.14
C:Rename BBS:T/LastUser.12 TO BBS:T/LastUser.13
C:Rename BBS:T/LastUser.11 TO BBS:T/LastUser.12
C:Rename BBS:T/LastUser.10 TO BBS:T/LastUser.11
C:Rename BBS:T/LastUser.09 TO BBS:T/LastUser.10
C:Rename BBS:T/LastUser.08 TO BBS:T/LastUser.09
C:Rename BBS:T/LastUser.07 TO BBS:T/LastUser.08
C:Rename BBS:T/LastUser.06 TO BBS:T/LastUser.07
C:Rename BBS:T/LastUser.05 TO BBS:T/LastUser.06
C:Rename BBS:T/LastUser.04 TO BBS:T/LastUser.05
C:Rename BBS:T/LastUser.03 TO BBS:T/LastUser.04
C:Rename BBS:T/LastUser.02 TO BBS:T/LastUser.03
C:Rename BBS:T/LastUser.01 TO BBS:T/LastUser.02
C:Rename BBS:T/LastUser.00 TO BBS:T/LastUser.01
RexxC:RX 'Say( left( Date(W),8) Time() left( "{NAME}", 27) " "left( "{LINE}", 3) left( "{CONNECT}", 20)) >>BBS:T/LastUser.00
C:Attach F=BBS:T/LastUser.01 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.02 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.03 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.04 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.05 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.06 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.07 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.08 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.09 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.10 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.11 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.12 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.13 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.14 T=T:LU{$$}
C:Attach F=BBS:T/LastUser.15 T=T:LU{$$}
C:Copy BBS:Texte/Header.LastUsers.txt TO BBS:Texte/Stats.LastUsers.txt
C:Type T:LU{$$} NUMBER >>BBS:Texte/Stats.LastUsers.txt
C:Delete T:LU{$$}